(prompt "Where do you want Amiconnect to be installed?")
(help @askdir-help)
(default "amitcp:bin")
)
)
(set @default-dest acdest)
(makeassign "ac" acdest
(safe)
)
(copyfiles
(prompt "Copying Amiconnect to " acdest )
(help @copyfiles-help)
(source "mainprogram")
(dest acdest)
(all)
(infos)
(confirm)
)
(makedir "amitcp:docs"
(infos)
(safe)
)
(set docdest
(askdir
(prompt "Where do you want Amiconnects Doc File to be installed?")
(help @askdir-help)
(default "amitcp:docs")
)
)
(copyfiles
(prompt "Copying Amiconnect Docs to " docdest )
(help @copyfiles-help)
(source "docs/amiconnect.guide")
(dest docdest)
(infos)
(confirm)
)
(copyfiles
(prompt "Copying Amiconnect Docs to amitcp:docs")
(help @copyfiles-help)
(source "docs/amiconnect.guide")
(dest "amitcp:docs")
(infos)
)
(set installnews
(askbool
(default 1)
(prompt "Do you wish to install a new postnews script\nso that GRn can postnews.\nThis script will also allow GRn and other newseditors\nto use Newsed's group signature option.")
(help @ask-bool)
)
)
(if (= installnews 1)
( ( set whichpostnews
(askbool
(default 0)
(prompt "Are you a Demon Internet subscriber?")
(help "Does you email address end in .demon.co.uk?\nIf it does select Yes else select No")
)
)
(if (= whichpostnews 0)
( (copyfiles
(prompt "Copying PostNews to Amitcp:bin ")
(help @copyfiles-help)
(source "amitcp/bin/postnews.nntpput")
(dest "amitcp:bin")
(newname "postnews")
(confirm)
)
(copyfiles
(prompt "Copying NNTP Put to Amitcp:bin ")
(help @copyfiles-help)
(source "amitcp/bin/nntpput")
(dest "amitcp:bin")
(confirm)
)
(copyfiles
(prompt "Copying Sendnews to Amitcp:bin ")
(help @copyfiles-help)
(source "amitcp/bin/sendnews")
(dest "amitcp:bin")
(confirm)
)
)
(copyfiles
(prompt "Copying PostNews to Amitcp:bin ")
(help @copyfiles-help)
(source "amitcp/bin/postnews.demon")
(dest "amitcp:bin")
(newname "postnews")
(confirm)
)
)
(copyfiles
(prompt "Copying Common News Stuff to Amitcp:bin ")
(help @copyfiles-help)
(source "amitcp/bin/all")
(dest "amitcp:bin")
(all)
(confirm)
)
)
(set fo 0)
)
(set installmail
(askbool
(default 1)
(prompt "Do you wish to install the mail daemon \nso that you can receive incoming mail")
(message "I now need to setup your \nusr,news,mail,spool and lib directories\nIf this is your first AmiTCP setup\n just use the defaults\nif not specify your current directories" (SAFE))
(set usrdir
(askdir
(prompt "Where is your usr: directory")
(help "This is the directory where all your \n news,mail,lib,spool directories are usually kept")
(default "amitcp:usr")
)
)
(set uunewsdir
(askdir
(prompt "Where is your uunews: directory")
(help "This is the directory where all your \n news articles will be stored")
(default "amitcp:usr/news")
)
)
(set uumaildir
(askdir
(prompt "Where is your uumail: directory")
(help "This is the directory where all your \n mail will be stored")
(default "amitcp:usr/mail")
)
)
(set uulibdir
(askdir
(prompt "Where is your uulib: directory")
(help "This is the directory where various files are stored/n including your newsgroup, signature, header and config files/n/n It is NOT your libs: library directory")
(default "amitcp:usr/lib")
)
)
(makeassign "uulib" uulibdir (SAFE))
(set uuspooldir
(askdir
(prompt "Where is your uuspool: directory")
(help "This is the directory where all your \n outgoing mail, news and the incoming news batchfile \nwill be stored")
(default "amitcp:usr/spool")
)
)
(set intro ("; This file contain assigns to important directories\n"))
(set intro2 ("; You may need to change the from what values are set\n"))
(message "Your mail or news program may require a file called uulib:config.\nAn example is included in the lib directory of this archive.\nYou will need to edit this and copy it to uulib:config."
(safe)
)
(message "Installation complete, you're on your own now")